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TITLE difSformat_hex_octal format one Line 
-IDENT /V04-000/ 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


kere iS gt oe ered A_LICENSE AND MAY BE USED AND COPIED 
N ACCORDANCE WITH THE TERMS OF mien LICENSE AND WITH THE 

N OF THe ABOVE gl dh NOTICE. THIS SOFTWARE OR ANY OTHER 
ES THEREOF _ NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
R PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 
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FACILITY: DCL Differences command 


ABSTRACT: oe ort DIFFERENCES command compares the contents of 
two es. 


ENVIRONMENT: VAX native, user mode 
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3 AUTHOR: Peter George, Benn Schreiber CREATION DATE: 1-August-1981 
40 ; MODIFIED BY: 
es 
a3 
000: te -psect $code,exe,nowrt 

Z 

0 ¢ Format one Line of hex or octal Listing 
4 Inputs: 


4(ap) start of buffer to — 
8(ap) number of entries per line 
12(ap) size of one ent ry . ; 
16(ap) current index into buffer (used to print on side of Li 
(ap) number of entries left in butter 
4(ap) 0>>Longword, 1>>word, 2>>b 
8(ap) fao control string descrip be 


PUPVPPTSTSIISIIN 


L 16 
es siggmt.veroc <a TERED EMP WIM ABErReBtitBaann Pd 


32(ap) address of string descriptor for output buffer 
003C sentry difSformat_hex_octal,“*M<R2,R3,R4,R5> 
53 OBA 70 mov 8(ap),r3 sget entries per Line in r3, size of 
54 af C& mul (2 sd ‘lenoute nunber of bytes this Line 
10 AC OD pushl recee? sstack index to print on right hand 
04 AC OD pushl 4(ap sstack buffer address 
54 OD pushl ré stack number of bytes 
3 14 4s i) movl 2 (a) 02 sget number of entries in Line 
AC O65 i) capl r2,8(ap) ssee if more than one Line's worth 
04 «15 bleq 108 tif leq no 
5 6 AC (OD mov | 8(ap).r syes...use max for one Line 
é 4 AC 0O 10$ mov | 4(ap),r scopy input data pointer 
0 WAC »D movi 24(ap5,r0 iget/test field width 
1 1 beql longwords zif eql then longwords 
08 5 E blbs r0,words sbranch if words 


; push bytes onto stack 
bytes: 


7E 7 9A 0 movzbl (r1)+,-(sp) zstack one 
FA 52 =F5 sobgtr r2,bytes 
0 13 0 brs call_fao 
3 ; push the words onto the stack 
0 words: i 
7E 1 6 0 movzwl (r1)+,-(sp) zpush one word 
FA ¢ F 0 sobgtr r2,words sdo them all 
0 11 00 brb call_fao :go call fao 
° ; push longwords onto the stack 


longwords: 


AAA AANA AA AAA AA ATINIMININININININ 2 2OO 


AVP ID OO WI 9 PIMA AOOO BNF LFF LMAO OOOOOCNWADWO "HO 


SDODOGOOGSOCO0000O0 0000090909 6909 09 09 09 09 09 SIN NII NIN NINO AAAOAAAAOOUMN 
BNA NEW SO ODNAUE WIN 9 OD NA UNE WN OS ODNOA MEW SOOO NOAUE UP 


g 0B pushl (ri)+ zpush one 
FB 52 =CO#F ? sobgtr r2,longwords 
4 > call SFAO 
4 1 call_fao: 
6—E OF 4 1 pushab $30) stack address of arg List 
20 AC OD 4 1 pushl (ap) Stack output buffer descr. addr 
6— 0D 4 1 pushl (sp) zalso for output width 
1¢ AC OD 4 1 pushl 28(ap) stack fao control string addr 
00000000'°GF 04 fe ¢ ' corte #4,g*sys$faol scall sys$faol to format string 
re 
B2 1 
5 1 -end 


DIF SFORMAT eaten format one Line os a P=1984 39:39:99 AX/VMS Macro V04-00 Page dy 


Symbol tabt P-1984 DIF .SRCIDIFHEXOCT.MAR; 1 
BYTES ef cf 1 
st FAO 8 1 
14 FORRAT HEX OCTAL 90 +s ! 
SYSS$F AOL geenreene x 1 
WORDS 00000034 R 1 

a ee ome 

: Psect synopsis ! 

seems enamenoazaoe & 
PSECT name Allocation PSECT No. Attributes 

ABS . 8 £00008 ( -} 89 ( 0.) NOPIC USR CON ABS- LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
$CODE 000 c - Gal ( 1.) NOPIC USR CON REL LCL NOSHR EXE RD NOWRT NOVEC BYTE 
Pos ee Heese neetaceaseoenonae $+ 
H Performance indicators ; 
Phase Page faults CPU Time lapsed Time 
Initialization 9 0:00:00. "5:00:00.9 
Command processing 152 883 : 33 ; 08 ibe: 
nee 1 oe : 66 09: 4 p : 0:0 08 
yabol table sor : :00:00. 

Pass 4 36 CC. : 38 0: 3: 1.64 
Symbol table output 2 0: a 0:00:00.07 
Psect synopsis output 1 0:00:00.0 0:00:00.03 
Cross-reference output 0 . : y-9 :00:00.00 
Assembler run totals 261 :00:01. :00:09.24 


The working set Limit was 750 pages. 

1470 bytes (3 pages) of virtual memory were used to buffer the intermediate code. 

There were 10 pages of symbol table space allocated to hold 6 non-local and 1 local symbols. 
108 source Lines were read in Pass 1, produc ing 14 object records in Pass 2. 

0 pages of virtual memory were used to define 0 macros. 


¢eroeer ower seroeseseorcreaceos eof 


! Macro Library statistics : 


soe momn aaa eneeca wn eoaewaoe 


Macro Library name ; Macros defined 
“S$255SDUAZB:(SYSLIBJSTARLET.MLBs20 SS 0 
O GETS were required to define 0 macros. 

There were no errors, warnings or information messages. 


MACRO/LIS=LIS$:DIFHEXOCT/OBJ=OBJ$:DIFHEXOCT MSRCS$:DIFHEXOCT/UPDATE=(ENHS$:DIFHEXOCT) 
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